home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / winsock / twnsck12.zip / SRC\ABOUT.C < prev    next >
Text File  |  1994-11-18  |  1KB  |  55 lines

  1. /*
  2.  *  TwinSock - "Troy's Windows Sockets"
  3.  *
  4.  *  Copyright (C) 1994  Troy Rollo <troy@cbme.unsw.EDU.AU>
  5.  *
  6.  *  This program is free software; you can redistribute it and/or modify
  7.  *  it under the terms of the GNU General Public License as published by
  8.  *  the Free Software Foundation; either version 2 of the License, or
  9.  *  (at your option) any later version.
  10.  *
  11.  *  This program is distributed in the hope that it will be useful,
  12.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  *  GNU General Public License for more details.
  15.  *
  16.  *  You should have received a copy of the GNU General Public License
  17.  *  along with this program; if not, write to the Free Software
  18.  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  */
  20. #include <windows.h>
  21.  
  22. extern    HINSTANCE hinst;
  23.  
  24. BOOL    CALLBACK
  25. AboutDlgProc(    HWND    hDlg,
  26.         UINT    wMsg,
  27.         WPARAM    wParam,
  28.         LPARAM    lParam)
  29. {
  30.     if (wMsg == WM_COMMAND &&
  31.         (wParam == IDOK || wParam == IDCANCEL))
  32.     {
  33.         EndDialog(hDlg, TRUE);
  34.         return TRUE;
  35.     }
  36.     else if (wMsg == WM_INITDIALOG)
  37.     {
  38.         return TRUE;
  39.     }
  40.     else
  41.     {
  42.         return FALSE;
  43.     }
  44. }
  45.  
  46. void
  47. About(HWND hwndParent)
  48. {
  49.     FARPROC    fpDlgProc;
  50.  
  51.     fpDlgProc = MakeProcInstance((FARPROC) AboutDlgProc, hinst);
  52.     DialogBox(hinst, "ABOUT_DLG", hwndParent, fpDlgProc);
  53.     FreeProcInstance(fpDlgProc);
  54. }
  55.